Hãy liệt kê các lỗi (nếu có) trong chương trình Pascal dưới đây và sửa lại cho đúng:

program dientich;
Const Pi:=3.1416;
var cv,dt : integer ;
 r : real;
begin 
r:=5.5;
cv:=2*pi;
dt :=pi*r*r ;
writeln ('chu vi la',cv)
writeln ('dien tich la',dt)
readln 
end.

Const pi:= 3.14; 

 Var cv:integer

 R:real; 

Begin

 R:=5.5;

Cv=2*pi*r;

 Writeln('chu vi la:=cv'); 

 Readln 

End.

Hãy sửa lại chương trình sau cho đúng:

Program bai4;

Const pi:= 3.14;

Var cv,dt:integer;

R:real;

Begin

R:=5.5;

Cv=2*pi*r;

Dt=pi*r*r;

Writeln('chu vi hinh tron la',Cv);

Writeln('Dien tich hinh tron la',Dt);

Readln; End.

Tìm lỗi sai trong các câu lệnh sau và chữa lại cho đúng ( viết lại chương trình đúng )
Var cv, dt : integer
r : real;
Const pi = 3.14;
Begin
r = 5.5;
dt := pi*r*r;
writeln(‘Dien tich hinh tron la:,dt:8:2’);
readln
End.

Trong chương trình Pascal sau hãy tìm lỗi sai và sửa lại cho đúng

1. Program Hinh tron

2. Var cr , dt , r : = integer

3. Begin

4. r : = 2

5. cv = 2 * pi * r

6. dt : pi * r * r

7. Writeln ( ' Chu vi la : = cv ' )

8. Writeln ( ' Dien tich la : ' = dt )

9. Readln

10 . End

Cho chương trình sauProgram KTGKI;Uses crt;Var dt, bankinh: read;Const pi=3,14;BeginClrscr;bankinh:=4,5; dt:=bankinh*bankinh*pi;Writeln(‘ Dien tich hinh tron ban kinh 4,5 la:’,dt:4:1);

Readln;End.a)(1.0 đ) Phần khai báo biến người lập trình đã sai về khai báogì ?Em sửa lại cho đúng.b)(2.0đ) Chỉ ra tên do người lập trình đặt ra trong chương trình trên

Cho chương trình sauProgram KTGKI;Uses crt;Var dt, bankinh: read;Const pi=3,14;BeginClrscr;bankinh:=4,5; dt:=bankinh*bankinh*pi;Writeln(‘ Dien tich hinh tron ban kinh 4,5 la:’,dt:4:1);

Readln;End.a)(1.0 đ) Phần khai báo biến người lập trình đã sai về khai báogì ?Em sửa lại cho đúng.b)(2.0đ) Chỉ ra tên do người lập trình đặt ra trong chương trình trên